昨天分享了將MSN機器人寫成獨立的一個Class，裡面除了登入和發送訊息之外，也另外加了一些簡單的屬性和功能，今天我們來看看該如何接收別人傳過來的訊息(或是回傳的訊息)，加上今天的程式碼，大家就可以試著自己寫一個簡單的MSN秘書囉！趕快讓我們來看看今天的程式碼吧！
今天的程式碼比較少，所以比較簡單，容易理解：

1.承續在上一篇所完成的Class中加入TextMessageReceived函式，程式碼如下：

    Private Sub TextMessageReceived(ByVal sender As Object, ByVal e As TextMessageEventArgs)
        Dim conv As Conversation = sender
        conv.SendTextMessage(New TextMessage(e.Sender.Mail & "你好啊！我是測試的MSN機器人，請多多指教！"))
    End Sub

2.接著我們可以利用程式碼視窗左上方的下接選單選擇msgr，右邊選擇ConversationCreated事件，這樣就會自動幫我們產生如下的程式碼，當然如果你想要自己手動輸入也是可以的：

    Private Sub msgr_ConversationCreated(ByVal sender As Object, ByVal e As MSNPSharp.ConversationCreatedEventArgs) Handles msgr.ConversationCreated
        '將每一個被建立的Conversation收到訊息的事件繫結到TextMessageReceived事件處理函式。
        AddHandler e.Conversation.TextMessageReceived, AddressOf TextMessageReceived

    End Sub

OK，完成了，我們今天的程式碼就這麼簡單的兩段，這樣就可以讓MSN機器人對於收到的訊息做出反應，透過TextMessageReceived函式所攜帶的e.Message.Text就可以得知對方傳送過來的訊息，只要解析傳送過來的訊息指令，就可以利用程式做出相對應的反應，所以就可以自己發揮想像力，可以實作一個簡單的MSN小秘書或是其它的應用囉！

實作簡單的MSN機器人系列文章：
實作一個簡單的MSN機器人
實作一個簡單的MSN機器人-2
實作一個簡單的MSN機器人-3
實作一個簡單的MSN機器人-4
實作一個簡單的MSN機器人-5